﻿Public Class Frm_darajat_ta9adi

    Private Sub Frm_darajat_ta9adi_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
        Frm_Dossier.Enabled = True
        Partager.com_ville(Frm_Dossier.comb_darajat_ta9adi, "comb_darajat_ta9adi", "darajat_ta9adi")
    End Sub

    Private Sub Frm_darajat_ta9adi_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        txt_ta9adi.Select()
        Partager.RemplirList(List_ta9adi, "comb_darajat_ta9adi", "darajat_ta9adi")
    End Sub

    Private Sub btn_ajout_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_ajout.Click
        Partager.AjouterWadifa(txt_ta9adi, List_ta9adi, "comb_darajat_ta9adi", "darajat_ta9adi")
    End Sub

    Private Sub btn_supp_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_supp.Click
        Partager.DeleteFromList(List_ta9adi, "comb_darajat_ta9adi", "darajat_ta9adi", txt_ta9adi)
    End Sub
End Class